-- card: 2842 from stack: in
-- bmap block id: 2144
-- flags: 0000
-- background id: 2706
-- name: 


-- part 2 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=435 top=23 right=89 bottom=512
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Handle
----- HyperTalk script -----
on mouseUp
  put 0 into winner
  hide card field 2
  hide card field 3
  show card field 4
  hide background button 1
  hide background button 2
  hide background button 3
  choose lasso tool
  click at 477,54 with commandkey
  set dragspeed to 150
  drag from 477,54 to 477,100
  set dragspeed to 50
  drag from 477,100 to 477,54
  choose browse tool
  set icon of BackGround button 1 to random(7)
  play boing
  show background button 1
  wait for 1 seconds
  set icon of BackGround button 2 to random(7)
  play boing
  show background button 2
  wait for 1 seconds
  set icon of BackGround button 3 to random(7)
  play boing
  show background button 3

  -- check buttons for cherrys

  if icon of BackGround button 1 = 4 then
    get icon of BackGround button 2
    if icon of BackGround button 2 ≠ 4 then
      multiply card field 1 by 1
    else
      if icon of BackGround button 3 ≠ 4
      then multiply card field 1 by 4
    else multiply card field 1 by 28
  end if
  hide card field 4
  show card field 2
  play "Woob Woob"
  play "Woob Woob"
  wait for 3 seconds
  add card field 1 to background field 1
  put 1 into winner
end if

-- check buttons for oranges

if icon of BackGround button 1 = 1 then
  get icon of BackGround button 2
  if icon of BackGround button 2 = 1 then
    get icon of BackGround button 3
    if icon of BackGround button 3 = 1 then
      multiply card field 1 by 8
      hide card field 4
      show card field 2
      play "Woob Woob"
      play "Woob Woob"
      wait for 3 seconds
      add card field 1 to background field 1
      put 1 into winner
    end if
  end if
end if

-- check buttons for apples

if icon of BackGround button 1 = 2 then
  get icon of BackGround button 2
  if icon of BackGround button 2 = 2 then
    get icon of BackGround button 3
    if icon of BackGround button 3 = 2 then
      multiply card field 1 by 12
      hide card field 4
      show card field 2
      play "Woob Woob"
      play "Woob Woob"
      wait for 3 seconds
      add card field 1 to background field 1
      put 1 into winner
    end if
  end if
end if

-- check buttons for bells

if icon of BackGround button 1 = 3 then
  get icon of BackGround button 2
  if icon of BackGround button 2 = 3 then
    get icon of BackGround button 3
    if icon of BackGround button 3 = 3 then
      multiply card field 1 by 16
      hide card field 4
      show card field 2
      play "Woob Woob"
      play "Woob Woob"
      wait for 3 seconds
      add card field 1 to background field 1
      put 1 into winner
    end if
  end if
end if

-- check buttons for single bars

if icon of BackGround button 1 = 5 then
  get icon of BackGround button 2
  if icon of BackGround button 2 = 5 then
    get icon of BackGround button 3
    if icon of BackGround button 3 = 5 then
      multiply card field 1 by 50
      hide card field 4
      show card field 2
      play "Woob Woob"
      play "Woob Woob"
      wait for 3 seconds
      add card field 1 to background field 1
      put 1 into winner
    end if
  end if
end if

-- check buttons for double bars

if icon of BackGround button 1 = 6 then
  get icon of BackGround button 2
  if icon of BackGround button 2 = 6 then
    get icon of BackGround button 3
    if icon of BackGround button 3 = 6 then
      multiply card field 1 by 100
      hide card field 4
      show card field 2
      play "Woob Woob"
      play "Woob Woob"
      wait for 3 seconds
      add card field 1 to background field 1
      put 1 into winner
    end if
  end if
end if

-- check buttons for macs

if icon of BackGround button 1 = 7 then
  get icon of BackGround button 2
  if icon of BackGround button 2 = 7 then
    get icon of BackGround button 3
    if icon of BackGround button 3 = 7 then
      multiply card field 1 by 500
      hide card field 4
      show card field 2
      play "Woob Woob"
      play "Woob Woob"
      wait for 3 seconds
      add card field 1 to background field 1
      put 1 into winner
    end if
  end if
end if

-- total up winings and show payoff

if winner = 0 then
  subtract card field 1 from background field 1
end if
put 0 into card field 1
hide card field 2
hide card field 4
show card field 3
talk "place your bet." ,150,150

-- check if user has any money
if background field "cash" = 0 then
  answer "You don't have any money" with "Quit Game" or "Go To Bank"
  if it is "Go to Bank" then
    answer "How much do you want to borrow" with "100" or "200"
    if it is "100" then
      add 100 to background field "cash"
    else if it is "200" then
      add 200 to background field "cash"
    end if
  end if
end if

end mouseUp


-- part 43 (button)
-- low flags: 00
-- high flags: 8004
-- rect: left=191 top=224 right=240 bottom=235
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: $1
----- HyperTalk script -----
on mouseUp
  add 1 to card field "bet"
  if card field "bet" > 100 then
    answer "You can only bet up to $100.00" with "OK"
    subtract 1 from card field "bet"
  end if
end mouseUp



-- part 44 (button)
-- low flags: 00
-- high flags: 8004
-- rect: left=245 top=224 right=240 bottom=289
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: $5
----- HyperTalk script -----
on mouseUp
  add 5 to card field 1
  if card field 1 > 100 then
    answer "You can only bet up to $100.00" with "OK"
    subtract 5 from card field 1
  end if
end mouseUp



-- part 45 (button)
-- low flags: 00
-- high flags: 8004
-- rect: left=299 top=224 right=240 bottom=343
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: $10
----- HyperTalk script -----
on mouseUp
  add 10 to card field 1
  if card field 1 > 100 then
    answer "You can only bet up to $100.00" with "OK"
    subtract 10 from card field 1
  end if
end mouseUp



-- part 48 (field)
-- low flags: 00
-- high flags: 0004
-- rect: left=413 top=224 right=242 bottom=457
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: bet


-- part 50 (button)
-- low flags: 00
-- high flags: 0004
-- rect: left=56 top=225 right=263 bottom=94
-- title width / last selected line: 0
-- icon id / first selected line: 20098 / 20098
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  go to stack "Home"
  show menubar
end mouseUp




-- part 52 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=237 top=170 right=198 bottom=385
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 18
-- style flags: 16640
-- line height: 24
-- part name: 


-- part 53 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=237 top=175 right=203 bottom=385
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 14
-- style flags: 16640
-- line height: 18
-- part name: 


-- part 54 (field)
-- low flags: 80
-- high flags: 0000
-- rect: left=237 top=174 right=202 bottom=385
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 14
-- style flags: 256
-- line height: 18
-- part name: 


-- part 58 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=92 top=188 right=202 bottom=161
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 10
-- style flags: 256
-- line height: 13
-- part name: 


-- part 60 (button)
-- low flags: 00
-- high flags: 0004
-- rect: left=56 top=272 right=310 bottom=94
-- title width / last selected line: 0
-- icon id / first selected line: 14767 / 14767
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
----- HyperTalk script -----
on mouseUp
  go to card id 4171
end mouseUp



-- part contents for card part 48
----- text -----
0

-- part contents for card part 52
----- text -----
Jackpot


-- part contents for card part 53
----- text -----
Place Your Bet

-- part contents for card part 54
----- text -----
3 In A Row Pays

-- part contents for background part 6
----- text -----
100